100 PRINT"[147]    22-COLUMN PRINT FORMATTER FOR C64":PRINT
110 PRINT"READING DATA"
120 FORI=828TO881:READA:CK=CK+A:POKEI,A:NEXT:POKE179,883 AND 255
130 IFCK<>6032THEN PRINT"ERROR IN DATA:CHECK TYPING.":END
140 PRINT"BEFORE...":SYS828:PRINT"AFTER..."
150 PRINT"PRESS RUN/STOP-RESTORE";:PRINT"TO REGAIN 40 COLUMNS"
160 PRINT"ENTERSYS828[146] TO":PRINT"REACTIVATE,IF":PRINT"NECESSARY."
170 PRINT"DO NOT EDIT ANY":PRINT"LINES WHILE IN 22 COL-UMN MODE."
1000 DATA169,71,141,38,3,169,3,141
1010 DATA39,3,96,72,152,72,138,72
1020 DATA56,32,240,255,192,9,176,3
1030 DATA76,100,3,192,31,144,15,169
1040 DATA13,32,202,241,56,32,240,255
1050 DATA160,9,24,32,240,255,104,170
1060 DATA104,168,104,76,202,241